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To start off this issue we have a couple 
announcements to make about some new 
products for the 99/4A. We were recently 
contracted by SCI TECH to work on the 
firmware for a RAM Disk card (Disk 
Emulator) for the 99/MA PE Box. SCI TECH is 
an established computer related company in 
Southern California that is branching out 
to manufacture products for the TI 99/4A. 

This RAM Disk card is slated to be user 
expandable from 6UK up to 256K in 64K 
increments. There is also space on the 
board to plug in an optional 32K for use as 
memory expansion, if you don't already have 
-it. This card will have an optional 
jxternal power supply available for it 
which will allow you to turn off your 
system without losing the contents of the 
RAM Disk. The RAM Disk can hold ALL types 
of files and programs, including Forth, and 
depending on the size you can have up to 
127 different files stored in it at one 
time. If the card does not have the 
external power supply attached it will 
automatically format itself on system power 
up. You can also format it from the 
complete Advanced Disk Manager that comes 
with it. Th^ disk manager allows you to 
format all or part of the RAM Disk, The 
unformatted part can be used by Assembly 
programmers as extra ram space. The RAM 
Disk looks exactly like a disk drive to the 
system except that it has a much higher 
transfer rate, approx 10-15 times faster. 
The load time for a 50 sector Basic program 
in single density format was approx 18 sec. 
With the RAM Disk this same program loaded 
in 1.5 seconds,, very fasti 

The RAM Disk can be configured, from a 

'"Command line or a running program, as DSK1 

or DSK5 and it can always be accessed as 

RDSK. The card will also add some new 



CALL'S to both Basic and X-Basic one of 
which is: 

CALL DIR This command or program statement 
will allow you generate a paged Catalog of 
any disk in your system WITHOUT losing your 
program or data in memory! After the 
directory is finished your program is still 
intact and can continue execution. 

The RAM Disk will be a nice addition to 
our systems and a great speed enhancer! I 
currently do not know the exact price or 
the release date but we will let you know 
in the next issue. 



Millers Graphics is about to release a 
new Memory and Disk Diagnostics program for 
the 99/MA that is compatible with the TI 
Disk Controller and the CorComp Disk 
Controller. This program, which is written 
by Steve Mildon, will do a complete memory 
check for VDP , Scratch Pad and Memory 
Expansion RAM and report any errors it may 
find. It will also do a complete disk 
diagnostic check which has the following 
features : 

Check and display the disk drive motor 
speed (RPM), check the bit map for bad 
sectors and report their numbers and check 
the disk for fractured files and report 
their names. It will also seek out any 
sector on command and read it or write to 
it with a verify and it will seek out any 
track on command and read it or write to it 
with a verify. It will allow 
different head step times to 
drives with to find the optimum 
running this program there won't be any 
doubt in your mind as to the status of your 
systems memory, diskettes or disk drives. 
At 19,95 plus 1.50 shipping and handling we 
believe that you will find it to be a nice 
utility that is well worth the money. (It 
should be ready to ship in approx M weeks.) 



you select 
test your 
time. After 
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Q&A 

There have been a number of questions 
regarding Basic's and Extended Basic's use 
of SAVE and OLD with Disk and Cassette. 
These questions have led us to believe that 
we should explain their use of memory a 
little better. 

BASIC - TI Basic does NOT recognize 
memory expansion!! When you load a Basic 
program either with cassette or disk it is 
loaded into VDP RAM and it stays there. A 
Basic program loaded through Basic is 
always in VDP RAM. If you load a Basic 
program through Extended Basic and you have 
memory expansion then it is moved out to 
high memory expansion after it is fully 
loaded. With this in mind it is useless to 
purchase memory expansion unless you are 
going to use Extended Basic, Editor 
Assembler, Mini Memory or one of the many 
programs that require it. If you have a 
Mini Memory module and Expansion Memory you 
can save and load Basic programs to and 
from high memory expansion with SAVE 
EXPMEM2 and OLD EXPMEM2 or you can use this 
area for files ie; OPEN #1 :"EXPMEM2", 

EXTENDED BASIC - TI Extended Basic DOES 

recognize memory expansion aind to get the 

full power of Extended Basic we strongly 

recommend that you use it with memory 

expansion. If you are using a cassette 

based system when you SAVE a program the 

line number table and crunched program are 

moved into VDP RAM and then saved to 

cassette. If the program is too large to 

fit in VDP RAM the computer returns an 

ERROR and you can not save it without 

editing out some code. What this means is 

that with a cassette system and memory 

expansion your program size is limited to 

the size of VDP RAM. However your programs 

can contain a greater amount of string and 

numeric variables since the symbol tables 

for these are generated AFTER you type in 

RUN. You might be able to get it to save by 

using more multiple line statements. Each 

line number adds 6 bytes to your program, 4 

bytes for the line number table entry, 1 

byte for the line length and 1 byte for the 

end of line marker (character). Another 

item to look at is your variable names, 

each character in the name is one byte. So, 

if you have a variable name that is 10 

bytes long and you use it 20 times in your 

program you've used up 200 bytes of program 
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space. We've also noticed that shorter 
variable names, 1-3 characters, run faster. 
One more item to consider' is using single 
character numeric variabres in place of 
constants such as 1,2,3 etc. or any other 
number that is quite frequently used in 
your program. Each direct number in your 
program requires 2 bytes + the number of 
digits + the decimal point. So the number 
100 uses up 5 bytes and the number 123.45 
uses up 8 bytes. If you assign this number 
to a variable like A=100, this assignment 
is 7 bytes, 2 for A= and 5 for 100, 
However, now whenever you use the variable 
A it only uses 1 byte instead of the 5 
bytes that 100 uses. This will shorten up 
your program length but every variable 
added to your program slows it down since 
it has to search through the symbol table 
each time you reference it. And lastly, as 
always, you can remove any REM statements 
since they use up 6 bytes for the line 
number, 1 byte for the REM token and 1 byte 
for EVERY character that follows it. Also, 
if a REM statement is logically in line 
with your program code it will slow it down 
a little. These program shorting tips also 
apply to Basic, 



If you have a disk system and memor:^ 
expansion you are able to write and save 
large progrEims that can use most of the 24K 
high memory expansion. Extended Basic only 
uses the low memory expansion for Assembly 
files. Assembly files can also be loaded 
with an Extended Basic program into high 
memory expansion provided they do not 
overlap onto your Extended Basic program. 
With a disk system if you save a program 
that is too large to fit in VDP RAM it 
changes it from a PROGRAM (memory image) 
type file to a INT/VAR 254 type file and 
writes out 1 record at a time. When this 
happens the save and load times are much 
longer and you will notice that your disk 
controller light and 32K light alternately 
blink on and off. If you load a a PROGRAM 
type file you will notice that the disk 
controller light blinks rapidly. Then, 
after the program has finished loading into 
VDP RAM, the 32K light will blink on when 
the program is transferred to high memory 
expansion. 

Due to the nature of the TI operating^ 
system and the Disk Controller DSR an, '' 
PROGRAM type file MOST fit into VDP RAM in 
order to Save or Load it. This is also true 
of the PROGRAM type files that the PRK and 
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Adventure modules produce. These files are 
mainly data but because of the structure of 
a PROGRAM type file they are very compact 
and very quick to load. We seem to get a 
number of questions on this type of file so 
lets explain it a little better. First off 
the Diskette doesn't care what is written 
on it, it will hold whatever is written to 
it. It is only the DSR and Languages that 
care what the file type is. The DSR is set 
up in such a way that ANY file that has a 
FIXED length can be read as a RANDOM type 
file. ANY file that is VARIABLE MUST be 
read as a SEQUENTIAL type file. And, ANY 
PROGRAM (memory image) type file is loaded 
into VDP RAM first and then it is moved to 
its proper location after it is fully 
loaded. Were it is moved to is determined 
by the program that loaded it. It may stay 
in VDP RAM or it may be moved out to memory 
expansion. The loading program can move 
pieces of it into different locations, like 
TI Forth does with the FORTHSAVE file. Part 
of this file, User Variables, is moved into 
low mem and the resident vocabulary is 
moved into high-mem expansion. A memory 
image file is Just that, it is a copy of a 
block of RAM that has been saved out to 
disk, there are no control bytes or loader 
tags mixed in with the code. There are a 
few bytes in the beginning of files that 
pass info to the loader. In X-Basics case 
the PROGRAM file contains the line number 
table and the crunched program as they 
reside in memory. In the PRK case this file 
is a copy of RAM that contained your data. 
You can not RUN this file but the PRK 
program can load it into memory and use 
selected parts of it for data, Forth's 
BSAVE function is very similar to a PROGRAM 
type file. If TI Forth used file I/O 
instead of sector I/O and put file headers 
on the disk these BSAVEd files would 
probably be labeled as PROGRAM. I hope this 
has helped and not made it more confusing 
than it was. 



What happened to the rumors about Toys R 
Us and/or GE buying the rights to produce 
the 99/^A? 

Last we item that we herd about this was 
that TI was asking TOO MUCH money for the 
rights so both companies decided not to 
buy! Also everything has been quiet on the 
99/8, At one time we herd that Control Data 
Corp, was thinking about buying this or a 
version of the 99/5, but that was a long 
time ago. 



What is the AVDP chip (TMS 9228) or the 
new Video Display processor that TI is 
about to produce and can it be used to 
replace the TMS 9918A video chip in the 
99/MA7 

The TMS 9228 is a new development from 
TI, It is not currently in production, it 
is still in the testing stages so some of 
the specifications may change. According to 
our friend, W.R. Moseid, sample chips 
should be ready for release in the first 
quarter of 85' and production quantities 
should be available around the last quarter 
of 85*. TI would like to see this chip 
become a standard for VideoText interface 
units. 

This new chip will address from 16K to 
256K of video RAM. It allows up to 10 
sprites per row since it has ten sprite 
registers. It has 5 graphics modes and 2 
text modes. Text mode I is 40 columns and 
Text mode II is 80 columns. Both Text modes 
allow multicolored text with a special mode 
setting. The graphics modes go from the 
standard 32 column Basic mode up to a true 
bit map mode that has 256 x 210 pixel 
resolution and requires 26880 bytes of RAM 
to use it. It is a true bit map mode in 
that each individual pixel can be set to 
one of 16 colors. There is an even higher 
resolution mode that has 512 x 192 pixels 
know as Graphics IV mode. This mode maps 
its color like our current bit map mode 
which is limited to 2 colors per 
character's horizontal pixel row. 

Some of the items built into this chip 
are as follows: Sprites can be labeled into 
8 different groups and there is a read only 
register that contains the group numbers 
that have a coincidence. Sprites may also 
be multicolored, up to two colors per 
horizontal pixel row. The color palette 
allows you to use 16 colors of a 512 color 
palette at any one time. This palette is 
controlled by VDP register numbers 32-63 so 
you have a lot of program control. There is 
a hardware horizontal scroll that allows 
you to scroll from 1 to 256 pixels at a 
time. It can be used in any of the Graphics 
modes but not in the Text modes. There is 
also a vertical scroll that scrolls from 1 
to 192 or 210 pixels and it can be used in 
all modes. The chip also has a block move 
command that can be executed on a 
programmable interrupt and a sound 
generator built into it like the 99/4A*s. 
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A few of the other nice items about this 
chip are that it allows the CPU to directly 
access the VDP RAH and it allows a 
prograounable interrupt on a prespecified 
horizontal scan line. This would allow you 
to use the block move when the scan got to 
the middle of the screen. With this you 
could move a new sprite attribute and 
motion table into place or you could change 
the VDP registers for these tables and 
easily generate up to 64 sprites on the 
screen. Or, you could use the scrolling 
registers to scroll different portions of 
the screen in different directions 
depending on where the scan was. Once again 
TI has been able to pack a lot of power in 
a small package. 

Now that you have the good news here 
comes the bad news. NO you can not just 
plug this chip into your console. In order 
to use this chip you would have to modify 
both the VDP RAM and all of the circuit 
traces to the AVDP chip. This chip is 
available in a 40 pin package similar to 
the 9918a but all of the pin outs are 
different. Also our consoles currently 
contain 4116 RAM ohips for VDP and the AVDP 
chip can only use 4416 or 4164 RAM chips. 
TI's 4416»s and 4l64»s also have different 
pin outs than the 4116*3 but another 
manufactures may be pin compatible. There 
may also be a problem with TI Basic, in 
some of the Basic GROM code TI loads VDP 
Register 4 with >8, This places the pattern 
descriptor table at >4000, In a 16K system 
this is the same as >0000 since >3FFF=16K. 
With more than 16K installed the pattern 
descriptor table will be in the wrong place 
for most of Basic's character related 
statements. Until someone puts one of these 
chips in a console we wonH know for sure. 
This chip also requires a 35 MHz clock with 
some added circuitry, the VDP clock in the 
4A is 10,7 MHz. If anyone is successful in 
installing this chip in a console please 
lets us know, we would like to publish the 
details , 

While we are talking about VDP chips let 
me add that the 991 8A CAN NOT be directly 
hooked up to a Red, Green, Blue (RGB) 
monitor. You can only hook it to a 
composite video input (video in) jack. One 
of the Users Groups in Pennsylvania is 
going to try and replace the 991 8A with a 
9928A which does drive a RGB monitor. We'll 
keep you posted on the results and the 
details. 



A Little something extra for Christmas 
... but only if you've been REAL good I 

We recently had the opportunity to learn 
about a new computer system that TI is-^ 
about to release. It is named "The ' 
Explorer", This system was designed for 
High-Performance Symbolic Processing, to 
support the capabilities of LISP and the 
systems powerful software development 
system. According to TI this set up is 
ideal for developing software that uses 
Artificial Intelligence, 

The Explorer computer system comes in 
three units. The System Unit, the system 
Console and the Mass storage unit. The 
System unit contains the 32 bit LISP 
processor running at 7 MHz, 16K x 56 bits 
of what we call scratch pad RAM and 2 
megabytes of main memory RAM (standard) 
expandable to 16 megabytes per system. It 
also contains a 32 bit data and address bus 
called NuBus and can address a virtual 
memory space of 128 megabytes. This NuBus 
(developed by TI) has a transfer rate of 
37.5 megabytes per second. There is also an 
Eithernet LAN Interface, Parallel and RS232 
ports, a graphics control logic with 1 
megabit bit map using 120 nanosecond RAM 
and the interface controller for the system'^ 
console. This interface hooks the monitor, 
keyboard, mouse, microphone and headset to 
the System unit via a fiber optics cable. 
This allows for a 68 megapixel per second 
transfer rate! The 17 inch monitor has a 
resolution of 1024 x 808 pixels. The 
keyboard is similar to the TI Pro's except 
they have added more keys for a total of 
111. The mouse is sin optical 3 button unit 
with 200 dots per inch resolution. The Mass 
storage unit(s) (up to four per system) 
house two 5 1/4 devices (ie: hard disk and 
tape drive). By placing all hard disks in 
these units it is possible to have up to 
896 megabytes of formatted hard disk space 
with a minimum of 1 megabyte per second 
transfer rate. The system also comes with a 
TI 855 printer. All this for only $52,500 

to $66,500 Lets see, the 4A started at 

$1,400 and came down to .,. Hmmmmm 

Well.. Dream On... Christmas is just around 
the corner! 

By the way, if you would like a brochure 
to put under your pillow try writing to: >^ 

Texas Instruments ^ 

P,0, Box 809063 
Dallas, TX, 75380-9063 



OOPS! 

Well we spoke a little too soon about 
the May issue. Right after the May issue 
went to press we received the following 
info from Heiner Martin, of West Germany. 
It appears that the GPL Link program we 
published has a bug in it. If you are using 
the routine within an assembly language 
program that executes a BEEP or HONK sound 

execute another GPL BEEP or HONK 
your computer will lock up. The 
HONK sounds are interrupt driven 
and as such they modify H1 1 of the GPL Work 
Space if you access a sound list in GROM, 
If you are only using the routine with the 
CALL EXEGPL then it returns back to X-Basic 
and everything is properly restored. So, 
the CALL LOAD version we published is OK 
since you return to X-Basic after every GPL 
Link. Listed below is the version that 
Heiner Martin sent us. This one works much 

better with your assembly language 

programs . 

— Thank you Mr. Martin — 



and then 
routine 
BEEP and 




UTLWS 


EQU 


>2038 


SOBST 


EQU 


>8373 


GRMRA 


EQU 


>9802 


GPWS 


EQU 


>83E0 


GPLLNK 


DATA 


UTLWS 




DATA 


GPLLNl 


GPLLN1 


MOVE 


@GRMRA , RO 




SWPB 


RO 




MOVB 


@GRMRA , RO 




SWPB 


RO 




AI 


R0.-3 




MOVB 


esUBST,R1 




SRL 


R1,8 




AI 


R1 , >8300 




I NOT 


R1 




MOV 


R0,»R1 




SWPB 


R1 




MOVB 


R 1 , esUBST 




LI 


R3,>2000 




MOV 


»R3,R2 




LI 


RO , GPLLN2 




MOV 


R0,«R3 




MOV 


»Rl4+,e>83EC 




LWPX 


GPWS 




B 


eX)060 


GPLLN2 


LWPI 


UTLWS 




MOV 


R2,»R3 




RTWP 






END 





Mr. Martin also sent us the following 
information on our GROM Chip Memory Map. 

We stated that we thought the area from 
>16DC to >17FF was not used, well it 
appears that we should have done a little 
more digging. Mr. Martin has informed us 
that this area contains the ASCII code 
tables that are used by the SCAN routine. 
Here is the list that he sent to us: 



16E0 
1700 
1730 
1760 

1790 
17C0 



- 16FF Joystick Codes 

- 172F Small Characters 

- 175F Shift Table 

- 178F FCTN Table 

- 17BF CTRL Table 

- 17EF Table for modes 1 
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For everyone with a CorComp Double 
Density Disk Controller card Tom Knight 
sent us the following program. This short 
program allows you to load the CorComp Disk 
Manager from the Editor Assembler module 
with option 3 - Load and Run. Thanks Tom. 



MGR 



IDT 


* LOADMNGR * 


AORG 


>2700 


DEF 


MGR 


LWPI >83E0 


MOV 


Rn,e>8300 


LI 


R12,>1100 


SBO 


>0000 


SBZ 


>000B 


BL 


^>44F2 


NOP 




SBZ 


>0000 


MOV 


e>8300,R11 


B 


•HIT 


END 




PEEKING AROUND 
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Our GROM maps for this issue became a 
little more involved, and time consuming, 
then we planned on. There was so much 
information that we wanted to pass on to 
you they they ended up a little long. For 
this reason we took out the PC column this 
issue and, as you may have already noticed, 
there wasn't much room left for the 
programs we wanted to run. Next issue we 
will lighten up a little on the maps and 
devote more space to programs. These GROM 
Maps complete the memory mapping of console 
GROM, so we will move, to another area next 
issue. 




|>2000 



i 



I 

I 
I 

I 

I 
I 



>2000 
>2001 
>2002 

>2003 

>2004 
>2006 
>2008 
>200A 
>200C 
>200E 



|>2010 
|>2012 
1>2014 
|>2016 
|>2018 
|>201A 
|>201C 
|>201E 

I >2020 

I 
I 

|>2022 
I 



I 

I>214D 

I 



>214F 

>2151 
>2152 
>2156 



I 

I 
|>215A 

i>215C 

|>2164 

|>216C 

I 

t 

I 

I 
|>216F 

I 



I >216F 

I >2192 

I >2195 

I 

i >21D6 

I 

t >21E5 

I 

I >2214 

I 



GROH HEADER 

>AA Valid GROM Header Identification Code 

>02 Version number 

>01 Number of Programs. 

>00 Reserved 

>0000 Address of Power Up Header 

>^^^J) Address of Application Program Header 

>0000 Address of DSR Routine Header 

>4D1A Address of Subprogram Header (in GROM 

>0000 Address of Interrupt Link 

>0000 Reserved for future? expansion. 



^ 
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none here 



Chip 



* « 



2) 
none in GROM 



GROM CHIP 1 VECTOR TABLE (>2000 offset) 

>4m7 Routine to begin execution of Basic program in GROM 

>4195 Routine to clear flags & set up keyboard 

>460B Routine to parse (scan) an inputted command line 

>466C Routine to generate the SYNTAX ERROR message. 

>467E Routine to restore cursor position after Error 

>4192 Secondary entry point for Basic Interpreter 

>47F1 Routine that CALLS routines in GROM to load characters 

>436D Routine to move blocks of VDP RAM 

>46AB Routine to reset the length byte for strings and numerics 

ERROR MESSAGES DATA TABLE 

The Error messages in this table have a >60 (96) offset added 
to them for Basic so they are not readable with the Debugger's 
M G2022 214D command. (1st byte=length - Next bytes=message) 



here 



APPLICATIOH PROGRAM Header 

>0000 Pointer to next Application Program Header . . , none 
>216F Start address for this program (Main entry point) 
>08 Name length for this program 
>54492042 DATA :TI BASIC: (for the menu screen) 

>41 53^943 

>422B Vector for routine that erases the symbol table (>222B) 

DATA for the cursor character pattern 

DATA for the screen edge character pattern 

DATA for VDP Registers 2, 3 and 4 (>F0 OC F8) 

Note; first nibble is Ignored for reg 2 & 4 data. 

register 4 data sets the Pattern Desc. base address 
to >8»>800 = >4000 which equates to >0000 for 16K 

START OF TI BASIC IHTERPRETER 

The input line is scanned for the entries at >2214 and branches 

to them. If not one of these it executes the direct command 

(ie: CALL CLEAR or PRINT B+C etc.). 

Entry point for 'NEW routine 

Secondary entry point for Basic Interpreter 

Routine to clear flags, set up keyboard & prepare for input 

on the command line. 
Edit Routine that CALLs other routines to store the input from 

the keyboard into the VDP RAM Screen Image Table. 
Routine that CALLs another routine to scan the line just input 

and convert it into token codes and store it in VDP RAM 
CASE branch table for 'RUN NEW CONTINUE LIST BYE NUMBER 

OLD RESEQUENCE SAVE and EXIT » 



^■ 



-^^ 




1 Cont. 



r- 
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TI BASIC IITERPRBTEB Cont. 

Entry point for routine that erases the Symbol Table 
Entry point for 'LIST* routine 

•RUN* routine 
•CONTINUE* routine 
•NUMBER* routine 



>2245 
>224D 

>2268 

>228C 

>229F 

>22A7 
>22AA 

>2342 

>236D 



>2377 
>2417 

>2457 
>266C 

>267E 

>26AB 

>27E3 

>27F1 



>2828 
>2828 
>282A 
>282C 
>282E 

>2830 
>2832 
>2834 
>2836 
>2838 
>283A 
>283C 
>283E 
>2840 
>2842 
>2844 

>2846 
>2848 
>284A 
>284C 
>284E 
>2850 

>2852 
>2854 
>2856 
>2858 
>285A 



Entry point for 
Entry point for 
Entry point for 
Entry point for *SAVE* routine 
Entry point for *0U)* routine 
Entry point for * RESEQUENCE* routine 
Entry point for 'BYE* routine 

Routine to move blocks of VDP RAM from a Lower address to 

a Higher address as you input program lines. 
>8300 = VDP location to move FROM 
>8302 = VDP location to move TO 
>835C = Number of bytes to move 
Entry point for *EDIT* (program lines) routine 
Routine to begin execution of Basic program 
Routine to scan an Inputted command line CALLed from >21E5 
Routine to generate the SYNTAX ERROR message. 
Routine to restore cursor position after Error 
Routine to reset the length byte for strings and numerics 
Routine that clears the screen, resets the cursor and edge 

characters and then executes the following routine 
Routine that CALLs routines in GROM to load character sets, 

then It resets the foreground and background colors 
and resets VDP Registers 2, 3 and 4 



VECTOR 

>4FFF 

>4F43 
>4C75 
>4DFA 

>4CA6 
>4A42 
>4C36 
>4FC4 
>4BD6 
>4F12 

>4EF9 
>4F5D 
>4C2B 
>4FAF 

>5493 

>5450 
>51E5 



>4D24 

>4D99 
>4C84 

>4CA0 

>4CC0 

>4C7A 

>4A49 
>4A4F 



TABLE FOB EDIT & PRBSCAH ROUTIHES O2000 offset) 
Prescan (builds symbol table and checks for errors) 
Generates Bad Line Number error message 
Routine to parse the input line for non space chars 
Lists a program line to screen (converts token code 

into ASCII, reserved words) 
Gets a valid character from the input line 
Main edit routine to read in a line from the keyboard 
Starts auto number with our line # and increment. 
Finds where the first token is stored in vdp ram for line 
Deletes and inserts program lines (moves memory around) 
Checks for valid line number 

Converts a line number from ASCII into Binary value 
Locates a program line in vdp ram 
Starts auto number with default values of 100,10 
Converts line # from Binary to ASCII and displays It 
Checks for room for symbol table or pab, this routine 

may execute a garbage collection and try again 
Checks for type of char 0-9 a-z A-Z etc. 
Places a variable in the symbol table 
Puts dummy entries Into the symbol table 
Prints out the WARNING messages 
Prints out the ERROR messages 
Checks the GPL stack and moves a char Into it 
Increments the VDP pointer for the next char 
Handles unquoted strings adds unquoted token & len to it 
Gets first non space char from the input line 
Secondary edit routine, allows different line length 
Third edit routine, allows different starting cursor pos 
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>285C 



>2A42 
>2A42 



>2Ail9 



>2A4F 



>2BD6 

>2C2B 

>2C75 
>2C7A 

>2C8M 
>2CA0 
>2CA6 
>2CC0 
>2D24 

>2D99 



>2DFA 

>2EF9 
>2F12 

>2F43 
>2F5D 
>2FAF 
>2FC4 
>2FFF 
>31E5 
>3M50 



>3493 



RESEB7ED VOfiD TOKKR TABLE 

First 10 words point to the start of reserved word groupings. 
Groups are broken up by number ot characters (1-10) per 
reserved word. The Token value follows the reserved word 

LIHE EDITOfi 

Routine that accepts keystrokes into a screen line. This is a 

line editor, it knows Insert, Delete etc. This entry point 

sets the default starting point and line length for Basic 
Second entry point for the line editor. By setting the line 

length in >835E before branching here you can change the 

maximum line length 
Third entry point for the line editor. By setting the line 

length in >835E and the start point in >836l before branching 

here you can have your input start and stop any place on 

the screen 
Routine that moves memory around for inserting and deleting 

program lines 
Routine that sets up the values for NUMBER (auto line numbering) 
Routine that parses a line and gets the non space chars 
Routine that gets the first non space char. Both this routine 

and the one above CALL the routine at >2CA6 
Routine that checks the stack and moves a char to it 
Routine that increments the VDP pointer and jumps to >2C84 
Routine that checks for strings or numerics and handles each 
Routine that hemdles unquoted strings, adds token & length to it 
Routine that prints the UARNXHG message on the screen 
Routine that prints the ERROR message on the screen. The pointer 

to the length byte In GROH for the WARNING or ERROR message 

is in the Scratch Pad at >8376 
Routine that lists a program line on the screen. Starting point 

for the line is in >8302 
Routine that converts an ASCII line number into binary 
Routine that checks for valid line number input 
Routine that generates the BAD LINE NUMBER error message 
Routine that finds a line from the line number table 
Routine that converts line # from binary to ASCII 4 displays it 
Routine that finds the first token of a program line in VDP 
PreScan routine, scans line or program and builds symbol table 
Routine that places the variable in the symbol table 
Routine that checks char type 0-9, a-z, A-Z etc. Character that 
is checked is at >8342. This routine sets the condition bit 
in the GPL Status register if char is valid for vau'iable name 
Routine that checks for enough room for a symbol table entry 
or a PAB. If there's not enough room between the symbol table 
and the string space it tries to move the string space to a 
lower address, this may execute a garbage collection. If 
there still isn't enough room it generates the MEMORY FULL 
error message. (Word at >834A s space needed in bytes) 

■GTE: Most of the above routines use the FAC and ARG sections of 
Scratch Pad RAM for parameter passing. Some of them will use 
the temporary space at >8300 - >8316. Usually whenever a 
a routine does anything with a single character the character 
is at >8342. Also, most of the references to Scratch Pad are 
with an offset of >8300. 
le: opcode BF 14 0008 = Double byte store 0008 at >8314 
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>3510 

>3513 
>3516 

>3519 



>351C 

>3527 
>352F 

>3538 



>360E 



>362A 



>3643 



>3708 



>37H8 



>3767 
>378E 



>37BF 



>37I>6 



BRAICH TABLE FOB A FEH OP 

>05 5671 = Branch to 5671 

>05 567D = Branch to 567D 

>05 4D7C = Branch to 4D7C 

>05 4D81 = Branch to 4D81 



RRBOS HBSSA1 

ILLEGAL STATEMENT 
MEMORY POLL 
BAD VALUE 
STRING-NDMBER MISMATCH 



BITBT POIHTS FOR A PBH (ff THE CALL STATEMEITS 

CLEAR - Places the space character •*- bias (>60) In every screen 
position by using the GPL statement of ALL : : 

DATA for SOUND >42,>OB,>12,>22,>00,>00,>00,>QO 

DATA for SOUND >01 ,>FF,>01 ,>04,>9F,>BF,>DF,>FF,>00 

SODID - This routine handles the entire sound statement. First 
It checks the duration, then it converts It Into 1/60 seconds 
because sounds are interrupt driven. Next it finds the first 
frequency and divides 111834 by it (111834/freq) and passes 
that value to a sound table it is setting up in VDP HAM. Next 
It gets the volume and sets that up and then passes all the 
values to the sound chip ( >8400 ) . Interrupt routine is In 
the console ROM chip. 

HCHAS - This routine and the VCHAR routine both call a 

subroutine at >37D6 to parse the statement for X,Y,CHAR,#CHRS 
and converts these into integer values. Then it puts them on 
the screen using a FMT statement (Formatted block move) that 
allows for writing over the border characters. 

TCHAR - This is very similar to the above statement except that 
it places the characters vertically. The number of characters 
is at >834A, the character is at >8300, screen row Is at 
>837E and the screen column Is at >837F. 

CHAR - This routine converts the string into the proper values 
for defining a character and moves these values into VDP RAM 
at the proper character + bias (>60) location. Both FAC 
0834A) and ARG (>835C) are heavily used during this CALL. 
This routine appears to set up a temporary string In VDP RAM 
so it is possible that it could invoke a garbage collection 
and if there isn't enough room it will generate a Memory Full 
error message. 

KET - This parses the statement for the key unit, checks it for 
the proper range, CALLs >3767 to move it to >8374 and then 
executes the SCAN routine. After returning it checks the 
Status and places the proper value Into your variable. Next 
it evaluates the keycode, converts it Into floating point and 
places it in your variable. 

JOIST ~ This is very similar to the above statement except after 
returning from >3767 It computes the proper X and Y values 
by CALLlng >5755 and then places them into your variables. 

Subprograms to do parsing for left parenthesis and commas, range 
checking for a range of 1-16, >0 or a preselected range. 

Subprogram to parse the row and column values out of a graphics 
statement (le: CALL HCHAR..,). 

SCREE! - This subprogram sets the Screen and border color. 
It uses the above subroutines to parse the statement and 
then places the value into VDP register 7* 

Subprogram to parse HCHAR and VCHAR statements for row, column 
(by CALLlng >378E), ASCII character value and number of 
characters. 




>4000 
>4000 
>i*002 
>4004 
>4006 
>4008 
>400A 
>400C 
>400E 
>4010 
>4012 
>4014 
>4016 
>4018 
>401A 
>401C 

>401E 
>40AF 
>4051 

>4053 

>4055 

>4057 

>4059 
>405B 

>405D 

>405F 

>4160 

>4174 

>41CF 

>41D7 

>4227 



>426C 
>4344 

>45E3 
>4641 



>46FC 



>474C 



>482B 



VBCTOfi 

>426C 
>4160 

>4227 
>4344 
>401E 
>4174 
>41D7 
>45E3 
>4956 
>41CF 
>46FC 
>4641 
>474C 
>4BFC 
>482B 



TABLE FOR FILE HODTHES (>0000 Offset) 

DISPLAY routine 

DELETE routine 

PRINT routine 

INPOT routine 

OPEN routine 

CLOSE routine 

RESTORE routine 

READ routine 

GET DATA FRC»! GROM/GRAM or RAM 

CLOSE ALL OPEN FILES routine 

PROGRAM SAVE routine 

PROGRAM LOAD routine 

LIST routine 

OUTPUT RECORD routine 

END OF FILE routine 



OPEM ROUTIHE - This handles OPEN #x: "device. xx", VARIABLE xx,... 
Case branch table for the following OPEN parameters: 



>40AB VARIABLE 

RELATIVE 
INTERNAL 
SEQUENTIAL 
OUTPUT 



>406B 

>40D1 

>4070 

>4095 
>409A 

>40A4 

>40B0 



UPDATE 
APPEND 
FIXED 



DELETE RODTIRE - This bandies the various DELETE functions 
CLOSE HOOTIHE - This handles CLOSE #x or CLOSE #x:DELETE 
CLOSE ALL FILES ROUTIHE - This closes all open files 
RESTORE ROUTINE - This handles RESTORE (data), RESTORE xx (data) 

RESTORE #x and RESTORE #x,REC x for files 
PRINT ROUTINE - This handles both screen and file PRINT. Both 
this and the Display routine check for Internal or Display 
type records and handle each accordingly. 
DISPLAI - This handles the screen DISPLAY statement (no files) 
INPOT ROUTINE - This handles both the screen and file INPUT 

it also checks data type against variable type 
READ ROUTINE - This handles the reading of DATA into variables 
it is not used for files. CALL'S routines at >48CC - >4992 
OLD ROUTINE - This is the OLD DSK1 .xxxxx or OLD CS1 routine, it 
sets up the PAB, Calls the DSR, Tests the Checksum, gets the 
new addresses for the end & start of the line # table, makes 
adjustments for different RAM size (4K?) and stores them at 
>8332 & >8330 respectively. Adjusts the memory and updates 
the line # pointers if different RAM size. Both OLD & SAVE 
CALL routines at >4888 - >48CB 
SAVE ROUTINE - This is SAVE DSK1 .xxx or SAVE CS1 , it closes all 
open files, clears all break points, stores the start and end 
pointers for the line # table, finds the number of bytes used 
O837O), passes it to the PAB and calls the DSR for a SAVE, 
LIST ROUTINE - This lists out the program lines to the screen 
or to the device specified. Unfortunately it generates a 
Syntax error if you use anything but a : after the device 
name, ie; LIST "PIO": 100-150 is OK but not "PIO" , VARIABLE 28 
OF FILE ROUTINE - This is the EOF(x) function. 
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>4888 



>48CC 



>4956 



>4993 



>4B53 



>i|BFC 



>4D00 
>i(DOO 
>4D02 
>4D0M 
>4D06 
>4D08 
>4D0A 
>4D0C 
>4D0E 
>MD10 
>4D12 
>4D14 
>4D16 
>4D18 

>4D1A 
>4D1A 
>4D1C 
>4D1E 
>4D1F 
>4D24 
>4D26 
>4D28 

>4D29 
>4D2E 
>4D30 
>4D32 

>4D33 
>4D38 

>4D3A 

>4D3C 

>4D3D 



SOBROUTINES 

OLD & SATE SDBRODTINE - This gets the program name, Initializes 

many of the program pointers, deletes the symbol table, sets 

up the PAB and returns. 
READ & IHPDT SUBROUTIHES - These find the symbol table entries, 

oheck for Strings or Numerics, decide if its GROM or RAM 

data and pass the Data Item to the variable. 

- GET DATA FROM GROM OR RAM - Reads the next Data item from 
GROM if the GROM Flag at >8389 is in >834D, If >834D is = 
then the next Data item is read from RAM. 

OPEN, CLOSE & RESTORE SOBRODTIHES - These parse out the file 
number (le; #1, If its there), check for the proper range 
C> and < 256 ), scan the PAB chain for the proper file. 
If any of these items are not right it returns with an error. 
On a Close the routine at >49E6 deletes the PAB and adjusts 
the memory and PAB chain pointers. 

PRINT SQBROOTIHES - These handle the outputting of data to the 
screen or to a file. They check for valid separators (,;:) 
and handle each accordingly. For screen output they add the 
character offset (>60) to each character. 

- OUTPUT A RECORD - This Is the subroutine that outputs a 

a record to either the screen or an output device, depending 
on the PAB ( file #0 = screen output) 



VECTOR 

>56CD 
>5120 
>4DB0 
>56BB 

>5613 
>5645 

>4DBF 

>4E38 
>4D8A 
>515C 
>55BB 
>56E1 

>5U9 



TABLE FOR BASIC EXECUTION 

Screen Scroll Routine 

Move a String from the Program area to the String Space 

Second entry point for executing a Basic Program 

Subroutine to find line number after BREAK 

Subroutine that sets the pointer for next Data item 

Subroutine to convert line number into ASCII (Trace mode) 

Third entry point for executing a Basic piM^gram (CONT) 

Subroutine that BREAKS a running program 

First entry point for executing a Basic program (RUN) 

Subroutine that sets up room for a String 

Subroutine that clears out a temporary String 

Subroutine to convert a String Into a Number 

Garbage Collection subroutine. 



SUBPROGRAM POINTER TABLE (For CALL xxxx. 
>4D24 Points to next Subprogram 
>3538 Entry point for this Subprogram 
X)5 Length of this name 
>534F554E44 :SOUND: 
>4D2E Points to next Subprogram 
>351C Entry point for this Subprogram 
>05 Length of this name 
>lt34C454l52 :CLEAR: 
>4D38 Points to next Subprogram 
>5713 Entry point for this Subprogram 
>05 Length of this name 
>434F4C4F52 iCOLOR: 
>4D42 Points to next Subprogram 
>56EF Entry point for this Subprogram 
>05 Length of this name 
>4743484152 :GCHAR: 
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>4D42 

>4D4M 

>4D46 

>4D47 
>4D4C 

>4D4E 

>4D50 

>4D51 

>4D56 

>4D58 

>4D5A 

>4D5B 

>4D5F 

>4D61 

>4D63 
>4D64 

>4D67 
>4D69 
>4D6B 
>4D6C 

>4D71 
>4D73 
>4D75 
>4D76 

>4D7C 

>4D81 

>4D86 

>4D88 

>4D8A 



>4DB0 



>4DBF 



>4E38 



>4E5B 



1 


1 VECTOR 


>4E84 I 


I >4FB6 


>4E86 


1 >5463 


>4E88 i 


1 >5479 


>4E8A , 


1 >5459 


>4E8C ; 


t >545E 


>4E8E 


1 >400E 


>4E90 i 


t >4004 


>4E92 


! >50DB 


>4E94 


I >5111 


>4E96 


1 >400C 


>4E98 


! >50CB 


>4E9A 


1 >4006 


>4E9C 


1 >4008 


>4E9E 


1 >400A 


>4EA0 


! >4F99 



SUBPROGRAM POINTER TABLE Cont. 

>4D4C Points to next Subprogram 

>360E Entry point for this Subprogram 

>05 Length of this name 

>4843484152 :HCHAR: 

>4D56 Points to next Subprogram 

>362A Entry point for this Subprogram 

>05 Length of this name 

>5643484152 :TCHAR: 

>4D5F Points to next Subprogram 

>3643 Entry point for this Subprogram 

>04 Length of this name 

>43484152 :CHAR: 

>4D67 Points to next Subprogram 

>3708 Entry point for this Subprogram 

>03 Length of this name 

>4B4559 :KET: 

>4D71 Points to next Subprogram 

>3748 Entry point for this Subprogram 

>05 Length of this name 

>4A4F595354 tJOTST: 

>0000 Points to next Subprogram (no more) 

>37BF Entry point for this Subprogram 

>06 Length of this name 

>53435245454E :SCREEH: 

Generate *BAD VALUE* Error Message 

Generate 'STRING-NUMBER MISMATCH' Error Message 

>56D4 - Branch to routine that sets up format for screen 

>566C - Branch to CAN'T DO THAT Error 

RUK - This is where a Basic program first starts to RUN, This 

sets up the line number pointers, scrolls the screen up 

1 line and falls through to the next entry. 
EXECUTE ~ This starts execution of the program or if in Command 

mode it executes the statement you Just typed in. 
Third Entry point for Basic program execution. This is where 

the CONTINUE Command branches to. 
Subroutine that BREAKS a running program. It prevents a break 

while GROM is executing, sets up the BREAK message and 

displays the line number. 

DONE •• - This is the normal end of program subroutine. 



TABLE FOR BASIC RESERVED WORDS 

FOR 

BREAK 

UNBREAK 

TRACE 

UNTRACE 

READ 

PRINT 

CALL 

QUOTED STRING CONSTANT 

RESTORE 

RANDOMIZE 

INPUT 

OPEN 

CLOSE 

( (Left Parenthesis) 



iv< 



^ 



-^ 



r 



r 




>4EA2 
>4EAit 

>4EA6 
>4EA8 
>4EAA 
>4EAC 
>4EAE 
>4EB0 
>4EB2 
>4EB4 
>4EB6 
>4EB8 
>4EBA 
>4EBC 
>4EBE 
>4EC0 
>4EC2 
>4EC4 
>4EC6 
>4EC8 
>4ECA 
>4ECC 
>nECE 
NOTE 



>54CF 
>5600 
>5613 
>5645 
>565C 
>56BB 
>56EF 

>5713 
>5740 

>5755 
>57AB 

>57C0 



VECTOR TABLB FOB BASIC BESERTBD 

>4FB2 + 



I :o 



Cont. 



(Plus) 
>4FA8 - (Minus) 
>4ED1 ABS 
>4EDC ATN 
>4EE2 COS 
>4EE8 EXP 
>4EEE INT 
>4EFA LOG 
>4F26 SGN 
>4F40 SIN 
>4F46 SQR 
>4F4C TAN 
>52BE LEN 
>53EA CHR$ 
>4F0O RND 
>4000 DISPLAY 
>4002 DELETE 
>524A SEG$ 
>531A STR$ 
>5349 VAL 
>53A9 POS 
>5306 ASC 

>05 40 1C EOF 

Rather than document each of the above items, which would 

require another 4-6 pages of memory maps, we will talk about 

these routines in general. 

First off, many of these routines end with the Opcode of >10 
this is the same as Basic's CONT, so the interpreter will go 
back to >4DBF and grab the next statement in your Basic Program. 

All of these routines use various parts of Scratch Pad RAM 
with FAC 0834A) and ARG (835C) being used very heavily. There 
is also a 24 byte segment at the top of Scratch Pad RAM O8300 
through >8316) used by Basic as temporary storage places 
for many of its routines. Some of the routines will clear out 
any values it has place into the FAC and ARG area or the Row, 
Column and Character value area at >837D - >837F. 

Most of the String handling routines require that FAC through 
FAC + 7 0834A - >8351) be set up prior to execution as follows: 

>834A = The Symbol table address that points to the string. 
= >6500 for a string and >6400 for numerics. 
= The address in VDP RAM of the string. 
= The length of the string. 

- Sometimes the GROM Flag is temporarily stored here 
Subroutine to handle User Defined Functions (ie: DEF ) 
Subroutine to check for String or numeric and set register bits. 
Subroutine to set the pointer for DATA items. 
Subroutine to convert the Line number into ASCII. 
Subroutine to print out an Error Message. 

Subroutine to find line # after BREAK, UNBREAK or RESTORE. 
GCHAR subroutine. 
COLOR subroutine. 

Subroutine to convert floating point to integer. 
Subroutines used by CALL JOYST and CALL KEY. 
Subroutine to check for the left parenthesis ( . 
Error Message subroutines. 



>834C 

>834E 

>8350 

»>8352 
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FORTH 



This month we have a little Forth 
routine that turns on the Peripheral DSR 
ROMs and searches through them for the 
various headers. Each peripheral determines 
its own headers, so all the headers will 
not be in every ROM. The valid list of 
headers are as follows: 



>i*000 
>M002 

>400M 
>4006 
>4008 

>nooA 

>400C 

>nooE 



Version 
in DSRs) 



Header Identification & 
# of Programs (not used 
Power Up Header Address 
User Program Header (not used ) 
DSR Link Header Address 
Subprogram Header Address 
Interrupt Header Address 
Reserved (not used) 



On a two or more disk drive system just 
type in the program exactly as it is 
printed and then LOAD the screen you saved 

it to. 

On a one drive system this program it 
will try to load the -CRU words from the 
Forth system disk. If you haven't saved 
this program on your system disk then 
delete -CRD from line Screen 110 and type 
in -CRU <enter> before LOADing the screen 
with the program on it, 

MARNING 

If you use the any of the following 
words: ON, DISKON, RS2320N, TPON or PCODEON 
be sure to type in ALLOFF when you are 
finished. If you do not and you leave a DSR 
ROM ON you will lock up your system when 
you go to access ANY of the peripherals!!! 

This happens because two DSRs can not 
occupy the DSR ROM space at the same time 
(do not use SWCH for the printer). 



The words DISKON, RS2320N, TPON and 
PCODEON turn on these DSRs. When some of 
them are on, like the Disk, their light 
will also come on. However, some of them, 
like the HS232, will not turn on the light. 
After a DSR is turned on you can DUMP its 
contents to the screen with the DUMPDSR 
word. 

The two main words for this program are 
SEARCH and SHOWALL . These words are just 
typed in, nothing needs to be on the stack 
for them to execute. If you just want to 
see a selected DSR header type in: 

HEX cru base BEAD <enter> 
ie: HEX 1100 HEAD displays the Disk DSR 
header. 

ALLOFF loops through all of the CRU 
bases and turns off all of the DSR ROMs. 
Make sure they are all off when you are 
finished I ! 

Quite a few of our readers have written 
asking how to convert their Forth system 
disks into Double sided and/or Double 
density. 

CorComp recently sent out a newsletter 
called the CorComp Cursor that contained a 
two page article on converting your Forth 
systems disks that was written by Jim 
Vincent, This article covered all of the 
changes you need to make to the screens 
that are disk size dependent including the 
changes to the FORMAT-DISK word. Rather 
than use up space here to repeat Jims 
instructions try to get a copy of this 
newsletter from your Group. If you can not 
get this info AND if we get a lot of 
requests for it we will publish it in a 
future issue. Have Fun, 
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( Peripher 

: OFF 

: ALLOFF 

: ON 

: DISKON 

: RS2320N 

: TPON 

: PCODEON 

: DUMPDSR 

: SEARCH 



--> 



al DSR P 
2 / SBZ 
2000 10 
ALLOFF 
1100 ON 
1300 
1800 
1F00 
4000 
PAGE 
." CRU 
2000 10 

4001 ce 

."Toe 
. " HEX 
( Note: 



eeker - Craig Miller) B 
; ( Turns 

F 100 +LOOP ; 



00 DO 
2 / SB 



ON 

ON 

ON 

IF 
n 



I OF 

DECIMAL 

( 



FF DUM 
Perip 
Base 
00 DO 

9 .R 
nable 
cru b 
PAGE 



p ; 

hera 
Ver 
I DU 
CR E 
DSR 
ase 
= 



( T 
Disk 

RS232 
Therm 
P-Cod 
Enabl 



TI 

( TI 

( TI 

C TI 
( Dumps 
1 DSRs found 
sion" CR CR A 
P 2 / SBO 400 
NDIF OFF 100 
ROM type in" 
ON <Enter> 
GOTOXT CLS 



ASE-> 
OFF s 

( Tu 
urns 
Contr 

Inte 
al Pr 
e Car 
ed DS 
at :" 
LLOFF 

ce 

+ L00P 
CR 
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R HEX 
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oiler Card 



CRU 
ROM ) 
DSRs) 



Card 
DSR 

to scr 



rf ace 
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d 

R ROM 

CR CR 

HEX 

AA = IF I 5 
CR DECIMAL 



DSR 
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ON 
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SCR #111 

( Peripheral DSR Peeker 

1 : 



2 

3 
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5 
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9 
10 
1 1 
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13 

^k 

15 



P 
PR 

HEAD1 



: HEAD 
--> 



5 U.R ; 
DUP P e 

DOP 2 / 

4000 PR 

4002 

4004 

4006 

4008 

400A 

400C 

400E 



P ; 

SBO 
n 



PR 
PR 
PR 
PR 
PR 
PR 
PR 
ELSE 
ENDIF 



n 
n 



CR 



cont . ) 

( HEX cru base HEAD lists DSR 

HEX 4000 C@ AA = IF CR 

Header Ident & Version" CR 

# of Programs (not used)" CR 

Power Up Header Address" CR 

User Program Header n/u" CR 

DSR Header Address" CR 

Subprogram Header Address" CR 

Interrupt Header Address" CR 

Reserved not used" CR 
- No DSR here" 



CR ALLOFF HEAD1 OFF DECIMAL 



t 



header ) 
CR 
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C 



Periphe 
7PAUS 

FINI 

EMITASC 

7HEAD 

3DUP 

NAMES 



ral DSR Peeker cont.) 

PAUSE IF ALLOFF DECIMAL SPI QUIT ENDIF 

7PAUS e 0= DUP IF SWAP DROP ENDIF ; 

DUP DUP 19 > SWAP 7F < AND IF EMIT ELSE 



PWUHDS 



DSRHDS 



ENDIF 






DUP § > DUP 0= IF SWAP DROP 
§ DUP DUP DUP ; 

CR 4 + DUP DUP DUP P Cg P ." 
Ce 1+ + SWAP 5 + ." name= 
DO I Ce EMITASC LOOP CR CR FINI 
?HEAD IF BEGIN 3DUP 
Next Power Up Header" CR 
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